home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 40 / 64er_Magazin_Sonderheft_40_19xx_Markt__Technik_de.d64 / farbiger rand (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1990-01-01  |  205 b   |  11 lines
  1. 5 for f=0 to 15
  2. 10 for i=0 to 39
  3. 20 poke 1024+i,42:poke 55296+i,f
  4. 30 poke 1024+960+i,42:poke 55296+960+i,f
  5. 40 next i
  6. 50 for k=0 to 960 step 40
  7. 60 poke 1024+k,42:poke 55296+k,f
  8. 70 poke 1024+39+k,42:poke 55296+39+k,f
  9. 80 next k
  10. 90 next f
  11.